home *** CD-ROM | disk | FTP | other *** search
- /*
- ** $PROJECT: xrefsupport.lib
- **
- ** $VER: checksuffix.c 1.1 (04.09.94)
- **
- ** by
- **
- ** Stefan Ruppert , Windthorststraße 5 , 65439 Flörsheim , GERMANY
- **
- ** (C) Copyright 1994
- ** All Rights Reserved !
- **
- ** $HISTORY:
- **
- ** 04.09.94 : 001.001 : initial
- */
-
- #include "/source/Def.h"
-
- BOOL checksuffix(STRPTR file,STRPTR suffix)
- {
- ULONG suflen = strlen(suffix);
- ULONG len = strlen(file);
-
- if(len > suflen && !Stricmp(&file[len-suflen],suffix))
- return(TRUE);
-
- return(FALSE);
- }
-
-